unit UnitGrafico;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, TeEngine, Series, DB, ADODB, ExtCtrls, TeeProcs, Chart, DbChart;

type
  TForm1 = class(TForm)
    DBChart1: TDBChart;
    qryGrafico1: TADOQuery;
    qryGrafico2: TADOQuery;
    Series1: TLineSeries;
    Series2: TLineSeries;
    qryGrafico3: TADOQuery;
    Series3: TLineSeries;
    qryGrafico1MESANO: TStringField;
    qryGrafico1CARTOES: TIntegerField;
    qryGrafico1VALORCARTOES: TBCDField;
    qryGrafico2MESANO: TStringField;
    qryGrafico2CARTOES: TIntegerField;
    qryGrafico2VALORCARTOES: TBCDField;
    qryGrafico3MESANO: TStringField;
    qryGrafico3CARTOES: TIntegerField;
    qryGrafico3VALORCARTOES: TBCDField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

uses UnitPrincipal;

{$R *.dfm}

end.
